home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Club 1999 July / Software of the Month - Ultimate Collection Shareware 263.iso / pc / Xtras / Behavior Library.cst / 00005_Script_Go to Previous Marker < prev    next >
Text File  |  1997-11-17  |  1KB  |  53 lines
  1. -- Marker  Go to Previous 
  2.  
  3.  
  4. --  nav
  5. -- behavior library version 1.1
  6.  
  7. --  goes to previous marker on author selected event
  8. -- also functions through lingo by handling message 'initGotoPreviousMarker', 
  9. -- for example if this behavior was assigned to sprite 5, use
  10. -- sendsprite 5, #initGotoPreviousMarker
  11.  
  12. property whichEvent
  13.  
  14. on initGotoPreviousMarker me
  15.   init me
  16. end
  17.  
  18. on mouseUp me
  19.   if whichEvent = #mouseup    then init me
  20. end
  21.  
  22. on prepareFrame me
  23.   if whichEvent = #prepareframe then init me
  24. end
  25.  
  26. on exitFrame me
  27.   if whichEvent = #exitframe  then init me
  28. end
  29.  
  30. on init me 
  31.   
  32.   go to marker (-1)
  33.   
  34.   
  35. end
  36.  
  37.  
  38.  
  39. ---
  40.  
  41. on getPropertyDescriptionList
  42.   
  43.   set p_list = [     #WhichEvent: [ #comment:  "Initializing Event:",                     #format:   #symbol,                      #range: [ #MouseUp, #PrepareFrame, #ExitFrame, #InitGotoPreviousMarker],                    #default:   #MouseUp ]                  ]
  44.   return p_list  
  45.   
  46. end
  47.  
  48. on getBehaviorDescription
  49.   return "Moves the Playback Head to the previous marker when the specified event occurs.  Drag to a sprite or a frame in the script channel." && RETURN & "PARAMETERS:" && RETURN & "ò Initializing Event - Specify the event that triggers the behavior."
  50.   
  51. end
  52.  
  53.